home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (PO) / Nibble Volume 10, No. 09 (1989-09)(MindCraft Publishing)(Side A).zip / Nibble Volume 10, No. 09 (1989-09)(MindCraft Publishing)(Side A).po / SORT.10.ITEM.bas < prev    next >
BASIC Source File  |  1996-12-24  |  176b  |  10 lines
  1. 10  DIM A$(10)
  2. 20  FOR X = 1 TO 9
  3. 30  INPUT "ITEM=";A$(X)
  4. 40  NEXT 
  5. 50 A$(10) = ""
  6. 60  PRINT "SORTING....": CALL 768A$(1)
  7. 70  FOR X = 1 TO 9
  8. 80  PRINT A$(X)
  9. 90  NEXT 
  10. 100  END